UNIVERSAL PERIPHERAL DEVICE CONTROLLER 

Field of the Invention 
The present invention relates to sending information from a portable device to a 
remotely-located computer. More specifically, it relates to data transmission from a computer 
peripheral device over the Internet to a web server. 



Background 

Most device communication systems require that custom software, drivers, and/or 
10 user interfacing software be installed on a personal computer (PC) in order to allow a 
peripheral device, such as a Palm Pilot, digital pad, or other peripheral device to 
communicate with the PC. In order for the peripheral device to transfer data to a remotely- 
located computer, such as a server, the peripheral device must first transfer the data to a local 
PC or other computer that has had the required custom software, drivers, and/or user 
1 5 interfacing software installed. 

The necessity of installing customized software, drivers and user interface software 
onto a PC to enable a peripheral device to communicate with that PC or remotely-located PCs 
or servers creates problems. Excess memory is used, interference with other software can 
occur, upgrades need to be installed on the PC, the software has to be maintained, conflicts 
20 between drivers can develop, as well as conflicts between COM ports and other conflicts 
between the software required to run the peripheral device and software that runs on the PC 
for other purposes. 

Moreover, whenever a user desires to transfer information from a peripheral device to 
a remotely-located computer, the user must either find a PC that has had the appropriate 
25 software installed or bring the software along so that he can install it on the nearest PC. What 
is needed is a method and system for transferring data from a peripheral device to a remote 
computer that is independent of what software is installed on a local PC or other device used 
to link the peripheral device to the Internet. 



30 
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Summary 



A preferred embodiment of the present invention comprises a software plug-in that 
allows a peripheral device to communicate via a host (e.g., a personal computer) with a 
remote server through a communications port. The plug-in is preferably downloaded from 
5 the remote server and allows the peripheral device to communicate with that server or other 
remote servers, and the remote servers are able to communicate and control the peripheral 
device without any additional software being installed to the host. 

Brief Description of the Drawings 
1 0 FIG. 1 depicts two potential configurations of a preferred system. 

FIG. 2 is a flowchart showing preferred functionality of software of a preferred 
embodiment of the present invention. 

Detailed Description of Preferred Embodiments 
1 5 FIG. 1 depicts two potential configurations of a preferred system. In a preferred 

embodiment, a user attaches a peripheral device, such as a digital camera 50 or a digitizer pad 
60, to a communications port (whether on a PC 10, a Web Phone, an Internet-enabled Palm' 
Pilot 30 or another Internet access device) and then uses a web browser to access a system 
web server 40. 

20 Upon connecting to the system web server 40, the user downloads a plug-in to the PC 

10, for example, that allows the peripheral device to communicate to the remote server 40 
through the communications port. Herein, the terms "plug-in" and "plug-in computer 
program" include software such as a browser plug-in, a PRC (also known as a "Palm 
Resource" or "Palm Application"), or an ActiveX Control. 

25 The plug-in allows the peripheral device to communicate with remote servers of the 

system and the remote servers are able to communicate with and control the peripheral 
device. Source code for a browser plug-in written in the C++ programming language and that 
uses the Netscape Plug-in Application Programming Interface (API) for running on Windows 
platforms is included in the Appendix at the end of this description. 

30 FIG. 2 is a flowchart showing preferred functionality of the plug-in and steps of a 

preferred method. A host is a device (PC with browser 10, Internet-enabled Palm device 30, 
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or other Internet-enabled device) that an input device (peripheral device - e.g., digitizer pad 
60, digital camera 50, non-Internet-enabled Palm Pilot) is connected to via a communications 
port of the host. As used herein, the term "communications port" includes an RS-232 serial 
port, a USB port, an infrared port, or a Bluetooth port. Thus, the term "input device" does not 
5 include a keyboard or a mouse. In the following description, the actions of the host are 

controlled by a plug-in that has preferably been downloaded over the Internet. At step 105 a 
host watches for data from an input device. At step 110 the host checks whether a request 
from the input device to upload data has been detected. If not, the host continues at step 105 
to watch for data from the input device. 

10 If at step 110 a request from the input device to upload data has been detected, then at 

step 115 the host initiates an upload process, and at step 120 data is transferred from the input 
device to the host's data storage. The data transfer is performed using the input device's 
specific communications protocol. This protocol is utilized by the plug-in. In a preferred 
embodiment, a different plug-in is used for each different communications protocol. In an 

1 5 alternate embodiment, a single plug-in comprises software to enable communications with a 
plurality of devices that use a plurality of different communications protocols. 

At step 125, the host checks whether the data transfer is complete. If not, then step 
120 is repeated and/or continued, as appropriate. If at step 125 data transfer is complete, then 
at step 130 the host prepares the received and stored data for transmission to a system web 

20 server 40. The data may be reformatted at this step. Preferably, it is packaged into a standard 
HTML POST command data packet. 

At step 135, the host initiates transmission of the received and stored data to a system 
web server 40. At step 140 the data is transferred from the host to the web server 40 through 
a browser installed on the host and the web server 40. The data is transferred to the system 

25 web server 40 using an API provided by the browser. 

At step 145 the host checks whether the data transfer to the web server 40 is complete. 
If not, then step 140 is continued or repeated, as appropriate. If at step 145 the data transfer is 
complete, then at step 150 the host reports the status of the data transmission to the user 
(success or failure). At step 155 the host returns to a monitoring state and repeats step 105. 

30 Although the present invention has been described with respect to input devices such 

as digitizer pads and digital cameras, and Internet-enabled devices such as PCs with browsers 
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and Internet-enabled Palm Pilots or other personal digital assistants (PDAs), those skilled in 
the art will recognize that the invention may be used to transmit data from any input device to 
a web server, if the input device is configured to transmit data to a PC or other device that can 
be connected to the Internet. 

5 

Appendix 

Source code for a browser plug-in written in the C++ programming language and that 
uses the Netscape Plug-in Application Programming Interface (API) for running on Windows 
platforms: 

Q 10 li=——=— —————————————— 

^ #include <stdio.h> 
:;g #include <string.h> 
;"T #include "npapi.h" 
CO #include <windows.h> 
15 #include "resource. h" 

lI #pragma comment(lib, "Wsock32.1ib") 

\2 #import "C:\dev\vc\timbrel_plugin\Windows\InkXfer.tlb" 
20 using namespace INKXFERLib; 

LRESULT CALLBACK PluginWindowProc( HWND hWnd, UINT Msg, WPARAM wParam, 
LP ARAM lParam); 

const char* glnstanceLookup String = "instance->pdata"; 

25 

HANDLE hComm; 
int gConnected = 0; 

static unsigned char *inBuffer=NULL; 
static unsigned char *outBuffer=NULL; 
30 DWORD inBufferSize; 
DWORD outBuffer S ize ; 

#definekMAX STRS 25 
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char gMessageTextArray[kMAX_STRS][256]; // - {"Line 1 "/'Line 2","Line 
3","Line 4","Line 5","Line 6","Line 7","Line 8","Line 9"}; 
int gMessageTextlndex = 0; 

int gN umLines=kM AX_STRS ; 

typedef struct Pluginlnstance 
{ 

NPWindow* fWindow; 
uintl6 fMode; 

HWND fhWnd; 

WNDPROC fDefaultWindowProc; 

NPP glnstance; 



15 



20 



25 



30 



char gHostName[256]; 

char gHostPort[8]; 

char gUID[8]; 

char gProxyName[256]; 

char gProxyPort[8] ; 

char gComPort[8]; 

char gComSpeed[10]; 

char gSourceURL[256]; 

BOOL gVerbose; 

char gVersion[6]; 

BOOL bTransNote; 

BOOL gReading; 
DWORD dwInBufferCount; 
DWORD dwInBufferlndex; 
DWORD dwOutBufferCount; 
DWORD dwFrame; 
DWORD dwSubFrame; 
DWORD dwFrameLength; 
DWORD dwDataLength; 
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DWORD 



dwBlockNumber; 



DWORD 



dwPreviousBlockNumber; 



DWORD 



dwBlockNumberC; 



DWORD 



dwBlockStart; 
dwNackCount; 



5 



DWORD 



} Pluginlnstance; 

// Frame type used to control FSM 

1 0 #define CP_NOFRAME 2000 

;S=| #define CP_UPLOAD 200 1 

;*Q #define CP_DATA 2002 

r| #define CP_FINAL 2003 

iio 15 // Subframe type used to control FSM 

#defineCPB_NONE 1000 
#defineCPB_FRAMESTART 1001 
[U #defineCPB_UIFRAME 1002 
l?20 #defineCPB_MSBFRAMELENGTH 1003 
#define CPB LSBFRAMELENGTH 1004 
#define CPB STREAMID 1005 
#defineCPB_COMMAND 1006 
#define CPB_NOP 1007 
25 #define CPB MSBDATALENGTH 1 008 
#define CPB SMSBDATALENGTH 1009 
#defme CPB SLSBDATALENGTH 1010 
#define CPB LSBDATALENGTH 101 1 
#define CPB_MSBBLOCKNUMBER 1012 
30 #define CPBLSBBLOCKNUMBER 1013 
#define CPB_MSBBLOCKNUMBERC 1014 
#define CPBLSBBLOCKNUMBERC 1015 
#defme CPB_DATA 1016 
#defineCPB ESCDATA 1017 
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#define CPB_EOT 1018 
#defineCPB_CRCl 1019 
#define CPB_CRC2 1020 
#define CPB_FRAMEEND 1021 
5 #defineCPB_FL0 1022 

// Constants defined by IBM's communications protocol 

#define CP_ESCAPE 0x7D 
1 0 #define CP_FRAME_START OxCO 

#define CP_UI_FRAME OxA 

#define CP_GET_SET 0x3 

#define CPSTREAM 2 

#define CP_FRAME_END OxCl 
1 5 #define CPNEGOTIATEID 0 

#define CP_BYTE_VERB 2 

#define CP_RESPONSE 0 

#defme CP_SUCCESS 0x65 

#define CP_ACK 6 
20 #defineCP_NACK0xl5 

#defme CP_EOT 7 

#define CP BEGIN STREAM 3000 

#defme CP_NOOP 0 

#define CP_NOP 2 

25 

#define uWORD 
#defme uBYTE 
#define initialCrc Value 
#define goodCrc Value 

30 

/* 

-*/ 

/* CRC- 16 lookup table 
*/ 




unsigned int 
unsigned char 
(uWORD)OxFFFF 
(uWORD)0xF0B8 
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-*/ 



const uWORD crcLookupTabIe[256]= 
{ 

5 0x0000,0x1 189,0x23 12,0x329b,0x4624,0x57ad,0x6536,0x74bf, 
0x8c48,0x9dcl,0xaf5a,0xbed3,0xca6c,0xdbe5,0xe97e,0xf8f7, 
0xl081,0x0108,0x3393,0x221a,0x56a5,0x472c,0x75b7 5 0x643e, 
0x9cc9,0x8d40,0xbfdb,0xae52,0xdaed,0xcb64,0xf9ff,0xe876, 
0x2 1 02,0x3 08b,0x02 1 0,0x 1 399,0x6726,0x76af,0x4434,0x5 5bd, 

10 0xad4a,0xbcc3,0x8e58,0x9fdl,0xeb6e,0xfae7,0xc87c,0xd9f5, 
0x3 1 83,0x200a,0xl291 ,0x03 1 8,0x77a7,0x662e,0x54b5,0x453c, 
0xbdcb,0xac42,0x9ed9,0x8f50,0xfbef,0xea66,0xd8fd,0xc974, 
0x4204,0x538d,0x6116,0x709f,0x0420,0xl5a9,0x2732,0x36bb, 
0xce4c,0xdfc5,0xed5e,0xfcd7,0x8868,0x99e 1 ,0xab7a,0xbaf3, 

1 5 0x5285,0x430c,0x7 197,0x601 e,0xl 4al ,0x0528,0x37b3,0x263a, 
0xdecd,0xcf44,0xfddf,0xec56,0x98e9,0x8960,0xbbfb,0xaa72, 
0x63 06,0x728f,0x40 1 4,0x5 1 9d,0x2 522,0x34ab,0x063 0,0x1 7b9, 
0xef4e,0xfec7,0xcc5c,0xddd5,0xa96a,0xb8e3,0x8a78,0x9bf 1 , 
0x7387,0x620e,0x5095,0x411c,0x35a3,0x242a,0xl6bl,0x0738, 

20 0xffcf,0xee46,0xdcdd,0xcd54,0xb9eb,0xa862,0x9af9,0x8b70, 
0x8408,0x958 1,0xa71a,0xb693,0xc22c,0xd3a5,0xel3e,0xf0b7, 
0x0840,0xl9c9,0x2b52,0x3adb,0x4e64,0x5fed,0x6d76,0x7cff, 
0x9489,0x8500,0xb79b,0xa612,0xd2ad,0xc324,0xnbf,0xe036, 
0xl8cl,0x0948,0x3bd3,0x2a5a,0x5ee5,0x4f6c,0x7df7,0x6c7e, 

25 0xa50a,0xb483,0x86 1 8,0x979 1 ,0xe32e,0xf2a7,0xc03c,0xd 1 b5, 
0x2942,0x38cb,0x0a50,0xlbd9,0x6f66,0x7eef,0x4c74,0x5dfd, 
0xb58b,0xa402,0x9699,0x8710,0xf3af,0xe226,0xd0bd,0xcl34, 
0x39c3,0x284a,0xladl,0x0b58,0x7fe7,0x6e6e,0x5cf5,0x4d7c, 
0xc60c,0xd785,0xe51e,0xf497,0x8028,0x91al,0xa33a,0xb2b3, 

30 0x4a44,0x5bcd,0x6956,0x78df,0x0c60,0xlde9,0x2f72,0x3efb, 
0xd68d,0xc704,0xf59f,0xe4 1 6,0x90a9,0x8 1 20,0xb3bb,0xa232, 
0x5ac5,0x4b4c,0x79d7,0x685e,0xlcel,0x0d68,0x3ff3,0x2e7a, 
0xe70e,0xf687,0xc41c,0xd595,0xal2a,0xb0a3,0x8238,0x93bl, 
0x6b46,0x7acf,0x4854,0x59dd,0x2d62,0x3ceb,0x0e70,0xlff9, 
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0xf78f ? 0xe606,0xd49d 5 0xc514 3 0xblab 5 0xa022,0x92b9,0x8330, 
0x7bc7,0x6a4e ? 0x58d5,0x495c,0x3de3,0x2c6a,0xlefl,0x0f78 

}; 

5 /* 

Cleanup - Initialize communications variables for the instance 

*/ 

void Cleanup(PluginInstance* This) 
{ 

1 0 This->dwInBufferCount=0; 

Th i s->dwInB uff erlndex=0 ; 

This->dwOutBufferCount=0; 

This->dwFrame=CP_NOFRAME; 

This->dwSubFrame-CPB_NONE; 
15 This->dwFrameLength=0; 

This->dwDataLength=0; 

This->dwBlockNumber=0; 

This->dwPreviousBlockNumber=- 1 ; 

This->dwBlockNumberC=0; 
20 This->dwBlockStart=0; 

This->dwNackCount=0; 

This->gReading=FALSE; 

} 

25 /* 

-*/ 

/* CrcCalculate Calculate a new CRC given the current 

*/ 

/* CRC and the new data. 

30 */ 

/* 

-*/ 

uWORD CrcCalculate 

( uWORD oldCrc, /* in: CRC calculated "so far" */ 
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uBYTE Data) /* in: data byte to calculate CRC on */ 

{ 

uWORD newCrc = oldCrc; 
5 newCrc = (oldCrc » 8) A crcLookupTable[(oldCrc A Data) & Oxff]; 
return newCrc; 

10 /* 

_* 

* calculateCrc Calculate a new CRC given the current CRC and * the new data. 

15 * 

*/ 

uWORD calculateCrc 

( uWORD oldCrc, /* in: CRC calculated "so far" */ 

uBYTE* pData, /* in: data bytes to calculate CRC on */ 
20 uWORD len) /* in: number of data bytes */ 

{ 

register uWORD newCrc = oldCrc; 
while (len—) 

25 newCrc = (newCrc » 8) A crcLookupTable[(newCrc A *pData++) & Oxff]; 

return newCrc; 
} /* calculateCrc */ 

30 

uWORD checkCrc(uWORD length, uBYTE * buffer) 
{ 

uWORD CRC = initialCrc Value; 
CRC = calculateCrc(CRC, buffer, length); 
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if (CRC == goodCrcValue) 

return 1; 
return 0; 
} 

5 

void Do Ack(H AN DLE hComm) { 
unsigned char ackBuffer[9]; 
DWORD dwWritten; 
ackBuffer[0] = CP_FRAME_START; 
1 0 ackBuffer [ 1 ] = CP_UI_FRAME; 
ackBuffer[2] = 0; //Length 
ackBuffer[3] = 1; 
ackBuffer[4] = CPSTREAM; 
ackBuffer[5] = CP_ACK; 
1 5 ackBuffer[6] = 0x85; //CRC 1 
ackBuffer[7] = 0x8F; //CRC 2 
ackBuffer[8] = CPFRAMEEND; 

WriteFile(hComm,&ackBuffer[0], 1 ,&dwWritten,NULL); 
Sleep(lO); 

20 WriteFile(hComm,&ackBuffer[0], 1 ,&dwWritten,NULL); 

Sleep(lO); 

WriteFile(hComm,&ackBuffer[0],l 5 &dwWritten,NULL); 
Sleep(lO); 

WriteFile(hComm,&ackBuffer[0], 1 ,&dwWritten,NULL); 
25 Sleep(lO); 

WriteFile(hComm,&ackBuffer[0], 1 ,&dvvWritten,NULL); 
Sleep(lO); 

WriteFile(hComm,&ackBuffer[ 1 ], 1 ,&dwWritten,NULL); 
Sleep(lO); 

30 WriteFile(hComm,&ackBuffer[2], 1 ,&dwWritten,NULL); 

Sleep(lO); 

WriteFile(hComm,&ackBuffer[3],l,&dwWritten,NULL); 
Sleep(lO); 

WriteFile(hComm,&ackBuffer[4],l ,&dwWritten,NULL); * 
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Sleep(lO); 

WriteFile(hComm,&ackBuffer[5], 1 ,&dwWritten,NULL); 
Sleep(lO); 

WriteFile(hComm,&ackBuffer[6], 1 ,&dwWritten,NULL); 
5 Sleep(lO); 

WriteFile(hComm,&ackBuffer[7], 1 ,&dwWritten,NULL); 
Sleep(lO); 

WriteFile(hComm,&ackBuffer[8], 1 ,&dwWritten,NULL); 

} 

10 

void DoNack(HANDLE hComm) { 
unsigned char nackBuffer[9]; 
DWORD dwWritten; 
nackBuffer[0] = CP_FRAME_START; 
1 5 nackBufferf 1 ] = CP_UI_FRAME; 
nackBuffer[2] = 0; //Length 
nackBuffer[3] = 1; 
nackBuffer[4] = CP_STREAM; 
nackBuffer[5] = CP_NACK; 
20 nackBuffer[6] = 0x9F; //CRC 1 
nackBuffer[7] = OxAD; //CRC 2 
nackBuffer[8] = CPFRAMEEND; 

WriteFile(hComm,&nackBuffer[0], 1 ,&dwWritten,NULL); 
Sleep(lO); 

25 WriteFile(hComm,&nackBuffer[0], 1 ,&dwWritten,NULL); 

Sleep(lO); 

WriteFile(hComm,&nackBuffer[0], 1 s &dwWritten,NULL); 
Sleep(lO); 

WriteFile(hComm,&nackBuffer[0], 1 ,&dwWritten,NULL); 
30 Sleep(lO); 

WriteFile(hComm,&nackBuffer[0], 1 ,&dwWritten,NULL); 
Sleep(lO); 

WriteFile(hComm,&nackBuffer[ 1 ], 1 ,&dwWritten,NULL); 
Sleep(lO); 
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WriteFile(hComm,&nackBuffer[2], 1 ,&dwWritten,NULL); 
Sleep(lO); 

WriteFile(hComm,&nackBuffer[3] 5 1 ,&dwWritten,NULL); 
Sleep(lO); 

5 WriteFile(hComrn,&nackBuffer[4], 1 ,&dwWritten,NULL); 

Sleep(lO); 

WriteFileChComm^nackBuffertSl^^&dwWritten^NULL); 
Sleep(lO); 

WriteFile(hComm ? &nackBuffer[6], 1 ,&dwWritten,NULL); 
10 Sleep(lO); 

WriteFile(hComm,&nackBuffer[7], 1 ,&dwWritten ? NULL); 
Sleep(lO); 

WriteFile(hComm ? &nackBuffer[8], 1 ,&dwWritten,NULL); 

} 

15 

BYTE TranslateDigitHex(unsigned char b) { 
switch (b) { 
case 0 : 
return '0'; 
20 case 1 : 

return T; 
case 2 : 

return f 2'; 
case 3 : 
25 return '3*; 

case 4 : 

return f 4 ? ; 
case 5 : 
return '5'; 
30 case 6 : 
return 
case 7 : 

return 7'; 
case 8 : 
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return '8'; 
case 9 : 

return '9'; 
case 1 0 : 
5 return 'a'; 

case 1 1 : 

return f b'; 
case 12 : 

return 'c'; 
10 case 13 : 

return 'd'; 
case 14 : 

return 'e f ; 
case 15 : 
1 5 return T; 

default: 

return '0'; 

} 

} 

20 

int instr(char *strl s char *str2) { 
int il=0; 
int i2=0; 

int l=strlen(str2); 
25 do { 

if (strl[il++]=sti2[i2++]) { 
if (i2==l) return 1; 

} else { 

if (strl[il]==*\0') return 0; 
30 i2=0; 

} 

} while (1); 

} 
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void AddMessage( HWND hwnd, char* message ) 

{ 

int i; 

5 if( gMessageTextlndex >= gNumLines ) // If exceeded preset line 

number display, reset to first line. 

{ 

// Clear array and resetcounter 
10 for (i = 0; i < gNumLines; i++ ) 

{ 

strcpy( gMessageTextArray[i], "" ); 

} 

1 5 gMessageTextlndex = 0; 



strcpy( gMessageTextArray[gMessageTextIndex++], message ); 

20 if( hwnd ) // So messages can be collected while a valid window 

handle hasn't been declared. 

. { 

InvalidateRect( hwnd, NULL, TRUE ); 
UpdateWindow( hwnd ); 

25 } 

} 



NPErrorNPP_Initialize(void) { 
#ifdef _DEBUG 
30 { 

char str[ 100]; 

sprintf(str,"NPP_Initialize\r\n"); 
OutputDebugString(str); 
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• 




#endif 



gConnected = 0; 
outBufferSize = 100000; 
inBufferSize = outBufferSize*2+2; 



inBuffer = (unsigned char *) NPNMemAlloc(inBufferSize); 
outBuffer = (unsigned char *) NPN_MemAlloc(outBufferSize); 
if ((inBuffer==NULL) || (outBuffer==NULL)) { 
if (inBuffer) { 



} 

return NPERROUTOFMEMORYERROR; 

} 

return NPERRNOERROR; 

20 } 

jref NPP_GetJavaClass(void) { 
return NULL; 

} 



// Deallocate I/O buffers and close the COM port void NPP Shutdown(void) { 
// Close the comm connection; 



30 #ifdef DEBUG 
{ 

char str[100]; 

sprintf(str, M NPP_Shutdown gConnected=%d 
hComm=%8.81x\r\n",gConnected 5 hComm); 



NPN_MemFree(inBuffer); 
inBuffer = NULL; 



} 

if (outBuffer) { 



NPN_MemFree(outBuffer); 
outBuffer - NULL; 



25 
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OutputDebugString(str); 

} 

#endif 

if (gConnected) 

CloseHandle(hComm); 
gConnected=0; 

// Free memory. 



10 



if (inBuffer!=NULL) NPNjVfemFree(inBuffer); 
inBuffer=NULL; 

if (outBuffer!=NULL) NPN_MemFree(outBuffer); 
outBuffer=NULL; 

15 } 

NPError NPP_New(NPMIMEType pluginType, 
NPP instance, 
uintl6 mode, 
20 intl6argc, 

char* argn[] ? 
char* argv[], 
NPSavedData* saved) { 

25 DCB deb; 

COMMTIMEOUTS ctm; 
BOOL gSuccess; 
int i; 

NPError result = NPERR_NO_ERROR; 
30 Pluginlnstance* This; 

#ifdef _DEBUG 
{ 

char str[100]; 
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sprintf(str, M NPP_New instance=%8.81x 
gConn=%d\r\n n ,instance 5 gConnected); 

OutputDebugString(str); 

} 

5 #endif 



if(instance==NULL) { 

return NPERR_INVALID_IN STANCE JERROR; 

} 

1 0 instance->pdata = NPN_MemAlloc(sizeof(PluginInstance)); 

This = (Pluginlnstance*) instance->pdata; 
if (This == NULL) { 

return NPERR_OUT_OF_MEMORY_ERROR; 

} 

1 5 /* mode is NP EMBED, NP_FULL, or NPBACKGROUND (see npapi.h) */ 

This->fWindow = NULL; 
This->fMode = mode; 
This->fhWnd = NULL; 
This->fDefaultWindowProc = NULL; 



20 



25 



// Initialize communications variables 
Cleanup(This); 

// Save plug-in instance 

This->glnstance = instance; 



// Get plugin parameters (hostname ? hostport 5 uid 5 proxyname,proxyport, 
// comm port, baud rate, sourceurl) that 
30 // was passed into the plugin via html. 



This->gHostName[0] = '\0'; 
This->gHostPort[0] = f \0'; 
This->gUID[0] = *\0'; 
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This->gProxyName[0] = '\0'; 
This->gProxyPort[0] = *\0'; 
This->gComPort[0] = '\0*; 
This->gComSpeed[0] = *\O r ; 
5 This->gSourceURL[0] = f \0'; 

This->g Verbose = FALSE; 
This->gVersion[0] = *\0'; 



for (i=0; i<argc; i++) { 
10 if(strcmp(strupr(argn[i]), M HOSTNAME M )=0) { 

strcpy( This->gHostName, argvfi]); 



15 



20 



25 



30 



else if (strcmp(strupr(argn[i]),"HOSTPORT")==0) { 

strcpy( This->gHostPort ? argv[i]); 
else if (strcmp(strupr(argn[i]),"UID")==0) { 

strcpy( This->gUID, argv[i]); 
else if (strcmp(strupr(argn[i]) ? "PROXYNAME")=0) { 

strcpy( This->gProxyName ? argv[i]); 
else if (strcmp(strupr(argn[i]) ? "PROXYPORT")==0) { 

strcpy( This->gProxyPort 5 argvfi]); 
else if (strcmp(strupr(argn[i]) 5 "COMPORT")=0) { 

strcpy( This->gComPort, argv[i]); 
else if (strcmp(strupr(argn[i]) 5 M COMSPEED M )=0) { 

strcpy( This->gComSpeed, argv[i]); 
else if (strcmp(strupr(argn[i]) ? M SOURCEURL M )==0) { 

strcpy( This->gSourceURL ? argv[i]); 
else if (strcmp(strupr(argn[i]) 3 "NUMLINES n )==0) { 

gNumLines=atoi( argv[i] ); 
else if (strcmp(strupr(argn[i]) ? ,, VERBOSE ,, )==0) { 

This->gVerbose=TRUE; 
else if (strcmp(strupr(argn[i]), M VERSION M )==0) { 

strcpy( This->gVersion, argv[i]); 
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// Close the comm connection so that the port parameters can be 

reset 



if (gConnected) { 

CloseHandle(hComm); 



#ifdef _DEBUG 
{ 

10 char str[ 100]; 

sprintf(str,"Closed comm port instance=%8.81x 
gConn=%d\r\n",instance,gConnected); 

OutputDebugString(str); 

} 

15 #endif 

// Connect to the Comm port and allocate the buffers. 



// hComm=CreateFile("D:\\TEMP\\Copy (2) of COMMLOG.BIN",GENERIC_READ | 
GENERICWRITE ,FILE_SHARE_WRITE,NULL,OPEN_EXISTING,0,NULL); 
20 hComm=CreateFile(This->gComPort,GENERIC_READ | GENERIC_ WRITE 

,FILE_SHARE_WRITE,NULL,OPEN_EXISTING,0,>njLL); 
if (hComm=INVALID_HANDLE_VALUE) { 
char message[256]; 

strcpy( message, "Error connecting to "); 
25 strcat( message, This->gComPort ); 

strcat( message, " - please confirm that it is available" ); 
AddMessage( This->fhWnd, message ); // ***** 
return 0; 

} 

30 ++gConnected; 



#ifdef DEBUG 
{ 

char str[ 100]; 



-20- 



NY2- 1169348.1 



sprintf(str/'Opening hComm=%8.81x 
gConn=%d\r\n",hComrn,gConnected); 

OutputDebugString(str); 

} 

5 #endif 



gSuccess=GetCommState(hComm,&dcb); 
if (IgSuccess) { 

AddMessage( This->fhWnd, "Error on GetCommState()„." ); 

10 // ***** 

return 0; 

} 

dcb.DCBlength=sizeof(dcb); 
dcb.BaudRate=atol( This->gComSpeed ); 
15 dcb.ByteSize=8; 

dcb.Parity=NOPARITY; 

dcb.StopBits=ONESTOPBIT; 

dcb.fBinary=l; 

gSuccess=SetCommState(hComm 5 &dcb); 
20 if (IgSuccess) { 

AddMessage( This->fhWnd, "Error on GetCommState()..." ); 

II ***** 

return 0; 

} 

25 ctm.ReadlntervalTimeout-MAXDWORD; 

ctm.ReadTotalTimeoutConstant=0; 

ctm.ReadTotalTimeoutMultiplier=0; 

ctm.WriteTotalTimeoutConstanr=0; 

ctm.WriteTotalTimeoutMultiplier=0; 
30 gSuccess=SetCommTimeouts(hComm ? &ctm); 

if (IgSuccess) { 

AddMessage( This->fhWnd, "Error on SetCommTimeouts()..." ); 

II ***** 

return 0; 
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} 
{ 

char message[256]; 

sprintf(message, "Connected to %s - please initiate upload from 
5 pad . . . ",Th is->gComPort); 

AddMessage( This->fhWnd ? message ); // ***** 

} 

Cleanup(This); 

10 // Check the version 

if (strcmp(This->gVersion," 1 .2.6")!=0) { 

AddMessage( This->fhWnd, "Warning - incorrect version of 
plug-in is installed. Please upgrade plug-in..." ); // ***** 

15 } 

#ifdef DEBUG 
{ 

char str[ 100]; 

20 sprintf(str,"End of NPP_New instance=%8.81x 

gConn=%d\r\n" 5 instance ? gConnected); 

OutputDebugString(str); 

} 

#endif 

25 

return result; 

} 

NPError NPP_Destroy(NPP instance, NPSavedData** save) { 
30 Pluginlnstance* This; 

#ifdef DEBUG 
{ 

char str[ 100]; 
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sprintf(str,"NPP_Destroy instance=%8.81x 
gCon=%d\r\n ,, ? instance,gConnected); 

OutputDebugString(str); 

5 #endif 



if (instance = NULL) 

return NPERR_INVALID_INSTANCE_ERROR; 



1 0 This = (Pluginlnstance*) instance->pdata; 

if (This != NULL) { 

//Kill the timer. 



#ifdef DEBUG 
15 { 



20 #endif 



char str[ 100]; 

sprintf(str,"Destroy timer %8.81x\r\n",This->fhWnd); 
OutputDebugString(str); 



KillTimer(This->fhWnd, 1); 



if( This->fWindow !=NULL ) { 
25 SetWindowLong( This->fhWnd, GWL_WNDPROC, 

(LONG)This->fDefaultWindowProc); 

This->fDefaultWindowProc = NULL; 
This->fhWnd = NULL; 

} 

30 

NPN_MemFree(instance->pdata); 
instance->pdata = NULL; 
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# 

// Close the comm connection on the last instance only 



if (gConnected == 1) 

{ CloseHandle(hComm); 

5 

} 

-gConnected; 

return NPERR_NO_ERROR; 

10 } 



NPError NPP_SetWindow(NPP instance, NPWindow* window) { 
NPError result = NPERR_NO_ERROR; 
Pluginlnstance* This; 
15 HWNDhButton; 

HANDLE hlmage; 
HANDLE hlnstance; 
RECT rect; 

20 if (instance == NULL) 

return NPERR INVALID INSTANCE ERROR; 



This = (Pluginlnstance*) instance->pdata; 

25 #ifdef DEBUG 

{ 

char str[100]; 

sprintf(str, "NPPSetWindow 
instance=%8.81x(%8.81x)\r\n M ,instance ) This->gInstance); 
3 0 OutputDebugString(str); 
} 

#endif 



if( This->fWindow != NULL ) /* If we already have a window, clean 
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* it up 

before trying to subclass 

* the new 

window. */ 
5 { 

if( (window = NULL) || ( window->window = NULL ) ) { 
/* There is now no window to use. get rid of the old 
* one and exit. */ 

SetWindowLong( This->fhWnd, GWLWNDPROC, 
1 0 (LONG)This->fDefaultWindowProc); 

This->fDefaultWindowProc = NULL; 
This->fhWnd = NULL; 
This->fWindow=window; 
return NPERRNOJSRROR; 

15 } 

else if ( This->fhWnd = (HWND) window->window ) { 

/* The new window is the same as the old one. Redraw 

and get out. */ 

20 InvalidateRect( This->fhWnd, NULL, TRUE ); 

UpdateWindow( This->fhWnd ); 
This->fWindow=window; 
return NPERRNOERROR; 

} 

25 else { 

/* Clean up the old window, so that we can subclass 

the new 

* one later. */ 

SetWindowLong( This->fhWnd ? GWL WNDPROC, 
30 (LONG)This->fDefaultWindowProc); 

This->fDefaultWindowProc = NULL; 
This->fhWnd = NULL; 

} 

} 
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10 



else if( (window == NULL) || ( window->window = NULL ) ) { 
/* We can just get out of here if there is no current 
* window and there is no new window to use. */ 

This->fWindow=window; 
return NPERR_NO_ERROR; 

} 

/* At this point, we will subclass 

* window->window so that we can begin drawing and 

* receiving window messages. */ 
#ifdef J5EBUG 

2 { 

.LJ 

J char str[200]; 

"'2 sprintf(str ? "Subclassing window %8.81x fhWnd = 

15 %8.81x\r\n",window->window ? This->fhWnd); 
=3 OutputDebugString(str); 

L > 
=y #endif 

□20 This->fDefaultWindowProc = (WNDPROC)SetWindowLong( 

(HWND)window->window ? GWL_WNDPROC, (LONG)PluginWindowProc); 
This->fhWnd - (HWND) window->window; 
SetProp( This->fhWnd 5 glnstanceLookupString, (HANDLE)This); 

25 try 
{ 

IApplicationPtr pApp( uuidof(Application)); 

This->bTransNote = TRUE; 

30 } 

catch(...) 

{ 

This->bTransNote = FALSE; 

} 
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// Create button 

GetClientRect(This->fhWnd,&rect); 
gNumLines = rect.bottom/20; 
if (This->bTransNote) 
5 { hlnstance = (HANDLE) 

GetWindowLong(This->fliWnd,GWL_HINSTANCE); 

hButton = CreateWindow( n button" 3 "IBM Upload",WS_CHILD | 
WSJBORDER | WS_VISIBLE | BS_PUSHBUTTON | BSCENTER | BS BITMAP | 
BSVCENTER, 

1 0 rect.right- 1 20,0, 1 20,32, 

This->fhWnd,(HMENU) 1,(HINSTANCE) 

hInstance,NULL); 

hlmage = 

LoadImage(GetModuleHandle( , WTimbrl.dir , ),MAKEINTRESOURCE(IDB_WORXON^ 
1 5 E_BITMAP,0,0,LR_SHARED); 

if (hlmage) 

SendMessage(hButton,BM_SETIMAGE,IMAGE_BITMAP 5 (LONG) 

hlmage); 
} 

20 #ifdef DEBUG 
else 

{ hlnstance = (HANDLE) 

GetWindowLong(This->fhWnd,GWL_HINSTANCE); 

hButton = CreateWindow("button*7'Upload File M ,WS_CHILD | 
25 WS BORDER | WS_VISIBLE | BS_PUSHBUTTON | BS CENTER | B SVCENTER, 

rect.right-90,0,90,30, 

This->fhWnd,(HMENU) 1,(HINSTANCE) 

hInstance,NULL); 
} 

30 #endif 



// Create timer for window 
#ifdef DEBUG 
{ 
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char str[100]; 

sprintf(str, "Create timer %8.81x\r\n M 5 This->fhWnd); 
OutputDebugString(str); 

} 

5 #endif 



SetTimer( This->fhWnd, 1, 0, NULL ); 

InvalidateRect( This->fhWnd, NULL, TRUE ); 
10 Update Window( This->fhWnd ); 

This->fWindow = window; 
return result; 

} 

15 

NPError NPP_NewStream(NPP instance, 
NPMIMEType type, 
NP Stream * stream, 
NPBool seekable, 
20 uintl6 *stype) { 

Pluginlnstance* This; 

if (instance == NULL) 

return NPERR_INVALID_INSTANCE_ERROR; 

25 

This = (Pluginlnstance*) instance->pdata; 
return NPERR_NO_ERROR; 

} 

30 

int32 STREAMBUFSIZE = 0X0FFFFFFF; /* If we are reading from a file in 
NPAsFile 

* mode so 

we can take any size stream in our 
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call (since we ignore it) */ 

int32 NPP_WriteReady(NPP instance, NPStream *stream) { 
5 Pluginlnstance* This; 

if (instance !=NULL) 

This = (Pluginlnstance*) instance->pdata; 
return STREAMBUFSIZE; 

} 

10 

int32 NPP_Write(NPP instance, NPStream *stream, int32 offset, int32 len, 
void *buffer) { 

if (instance !=NULL) { 

Pluginlnstance* This = (Pluginlnstance*) instance->pdata; 

15 } 

return len; /* The number of bytes accepted */ 

} 

NPError NPP_DestroyStream(NPP instance, NPStream *stream, NPError reason) { 
20 Pluginlnstance* This; 




* write 



if (instance == NULL) 

return NPERR_INVALIDJNSTANCE_ERROR; 
This = (Pluginlnstance*) instance->pdata; 

25 

return NPERR_NO_ERROR; 

} 



void NPP_StreamAsFile(NPP instance, NPStream *stream, const char* fname) { 
30 Pluginlnstance* This; 

if (instance !=NULL) 

This = (Pluginlnstance*) instance->pdata; 

} 
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void NPPJPrint(NPP instance, NPPrint* printlnfo) { 
if(printInfo = NULL) 
return; 



5 if (instance !=NULL) { 

Pluginlnstance* This = (Pluginlnstance*) instance->pdata; 

if (printInfo->mode = NP FULL) { 



1 0 void* platformPrint = 

printInfo->print.fullPrint.platformPrint; 
NPBool printOne = 

printInfo->print.fullPrint.printOne; 

15 /* Do the default*/ 

printInfo->print.fullPrint.pluginPrinted = FALSE; 

} 

else { /* If not fullscreen, we must be embedded */ 
NPWindow* printWindow = 
20 &(printInfo->print.embedPrint.window); 

void* platformPrint = 

printInfo->print.embedPrint. platformPrint; 

} 

} 

25 } 



void NPP_URLNotify( NPP instance, const char* url, NPReason reason, void* 
notifyData ) { 

switch( reason ) { 
30 case NPRESDONE: // Completed normally, 

break; 

case NPRES_USER_BREAK: // User canceled stream directly or 
indirectly. 

break; 
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case NPRESNETWORKERR: // Stream failed due to problems with 
network, disk I/O, lack of memory, or other problems, 
break; 

} 

5 } 

intl6 NPP_HandleEvent(NPP instance, void* event) 

{ 

return 0; 

10 } 



int PostURL(HWND hWnd, char *hostname, unsigned short hostport, int uid, 
unsigned char* buffer, int bufferlen, char *proxyname, unsigned short 
proxyport) { 
15 SOCKET skt; 

INT iResult; 

SOCKADDR IN server; 

WSADATA wsaData; 

HOSTENT *host; 
20 BOOL useproxy=0; 

int cc=0; 

char httpBuffer[256]; 

Pluginlnstance* This = (Pluginlnstance*) GetProp(hWnd, 
glnstanceLookupString); 

25 

iResult = WSAStartup(0x202,&wsaData); 
if (iResult==SOCKET_ERROR) { 

sprintf(httpBuffer, "Error on %d 
WSAStartup()... ,, ,WSAGetLastError()); 
30 , AddMessage(hWnd,httpBuffer); 
return - 1 ; 

} 

skt=socket(AFJNET,SOCK_STREAM,0); 
if (skt<0) { 
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sprintf(httpBuffer 5 "Error %d on 
socket()../\WSAGetLastError()); 

AddMessage(hWnd,httpBuffer); 
return -1; 

5 } 

if (strcmp(proxyname, MM )!=0) useproxy=l; 
if (useproxy==l) { 

sprintfithttpBuffer/'Looking up proxy %s...",proxyname); 

if (This->g Verbose) AddMessage(hWnd 5 httpBuffer); 
1 0 host=gethostbyname(proxyname); 

server. sin_port=htons(proxyport); 

} else { 

sprintf(httpBuffer ? "Looking up host %s...",hostname); 
if (This->gVerbose) AddMessage(h Wnd,httpBuffer); 
1 5 host=gethostbyname(hostname); 

server.sin_port=htons(hostport); 

} 

if (host==NULL) { 

sprintf(httpBuffer, "Error %d on 
20 gethostbyname()... ,, 3 WSAGetLastError()); 

AddMessage(hWnd,httpBuffer); 
return -1; 

} 

memcpy(&(server.sin_addr) 5 *host->h_addr_list,host->h_length); 
25 server.sin_family=host->h_addrtype; 

if (This->gVerbose) AddMessage(hWnd,"Connecting..."); 

//iResuIt=connect(skt,(SOCKADDR*)&server,sizeof( server)); 

//if (iResult==SOCKET_ERROR) { 

// sprintf(httpBuffer, "Error %d on 
,30 connect()..." ? WSAGetLastError()); 

// AddMessage(hWnd,httpBuffer); 

// return -1; 

//> 

// Try connecting multiple times - this exists to help us manage 
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// peak OCRServer traffic while we scale. If no processes 

// are available to service this connection, try again a number of 

// times. 

for (cc=0;cc<10;cc++) { 
5 iResult=connect(skt,(SOCKADDR*)&server,sizeof( server)); 

if (iResult!=SOCKET_ERROR) break; 
Sleep(lOO); 

} 

if (cc==10) { 

10 sprintf(httpBuffer ? "Server Busy - Please Try Again..."); 

AddMessage(hWnd,httpBuffer); 
return -1; 

} 

if (This->gVerbose) AddMessage(hWnd, M Executing HTTP POST 
15 method..."); 

if (useproxy== 1 ) { 

if (hostport!-80) { 

sprintf(httpBuffer,"POST http://%s:%d/%d/ 
HTTP/1. 0\nContent-Type: application/x-www-form-urlencoded\nContent-Length: 
20 %d\n\n",hostname,hostport,uid,bufferlen); 
} else { 

sprintf(httpBuffer,"POST http://%s/%d/ 
HTTP/1 .0\nContent-Type: application/x-www-form-urlencoded\nContent-Length: 
%d\n\n",hostname,uid,bufferlen); 
25 } 
} else { 

sprintf(httpBuffer 5 "POST /%d \nContent-Type: 
application/x-www-form-urlencoded\nContent-Length: %d\n\n M 3 uid,bufferlen); 
} 

30 iResuIt=send(skt,(const char*)httpBuffer,strlen(httpBuffer),0); 

iResult=send(skt,(const char*)buffer 5 bufferlen,0); 

if (This->gVerbose) AddMessage(hWnd/ f Waiting on HTTP response..."); 

iResult=recv(skt,httpBuffer 5 sizeof(httpBuffer),0); 

closesocket(skt); 
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WSACleanupO; 

if (This->gVerbose) AddMessage(hWnd,"Socket closed..."); 
if (iResuIt=SOCKET_ERROR) { 
5 AddMessage(hWnd, "Error on recv()..."); 

return -1; 
} else if (iResult==0) { 

AddMessage(hWnd,"Error on recv()..."); 

return -1; 

10 } else { 

httpBuffer[iResult]='\0'; 

if (This->gVerbose) AddMessage(hWnd,"Received HTTP 

response..."); 
} 

15 if(instr(httpBuffer,"<body>OK</body>")==l) { 

return 0; 

} else { 

if (This->gVerbose) AddMessage(hWnd,httpBuffer); 
return -1; 

20 } 
} 



char* AddTick(char *str) { 
static int tickCount; 
25 int i; 

if (str=NULL) { 

tickCount=0; 
return NULL; 

} else { 

30 tickCount++; 

sprintf(str,"Uploading"); 
for (i=0;i<tickCount;i++) 

str[9+i]=*. f ; 
strCP+i]^'; 
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return str; 

} 

} 

5 uBYTE GetNextByte(unsigned char *inBuffer 5 DWORD * index) 
{ 

uBYTE result; 

result = inBuffer[* index]; 
10 ++*index; 

if (result = CP_ESCAPE) { 

result = inBuffer[* index] A 0x20; 

++*index; 

15 return result; 



LRESULT CALLBACK PluginWindowProc( HWND hWnd, UINT Msg, WPARAM wParam, 
LP ARAM lParam) 
20 { 

Pluginlnstance* This = (Pluginlnstance*) GetProp(hWnd 5 
glnstanceLookupString); 

PAINTSTRUCT paintStruct; 
25 HDC hdc; 



//static unsigned char inBuffer[150000]; 
//static unsigned char outBuffer[75000]; 
DWORD dwRead; 
30 BOOL fDone=FALSE; 

char message[256]; 
static uWORD CRC=0; 
unsigned char b2=0; 
DWORD i2=0; 
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10 



15 



DWORD i 1=0; 
NPError err; 
int i; 

BOOL gSuccess; 
HWND hButton; 
RECT rect; 
long w,h; 
HANDLE hFile; 
bstr t szFileName; 

switch( Msg ) { 

case WM_SIZE: 

hButton = GetDlgItem(hWnd,l); 
if (IsWindow(hButton)) 
{ GetWindowRect(hButton,&rect); 
w = rect.right-rect.left; 
h = rect.bottom-rect.top; 
GetClientRect(hWnd,&rect); 



#ifdef DEBUG 



20 



char str[100]; 

sprintf(str,"Rect (%d,%d)-(%d,%d) 



Button %dx%d\r\n", 



25 rect.Ieft,rect.top,rect.right,rect t bottom ? w,h); 

OutputDebugString(str); 

} 

#endif 

MoveWindow(hButton,rect.right-w,0,w,h,TRUE); 

30 } 

GetClientRect(hWnd,&rect); 
gNumLines = rect.bottom/20; 
break; 

caseWM COMMAND: 
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if (Th i s->bTransNote) 
{ try 
{ 



5 pApp( uuidof(Application)); 

pApp->Archive; 

// 
// 

1 0 pArchive->Item[(long) (lPadNo-1)]; 
pArchive->GetActivePad(); 



15 



accessing COM object"); 



lApplicationPtr 

IArchivePtr pArchive = 

long lPadNo = pArchive->Count; 
IPadlnfoPtr pPadlnfo = 

IPadlnfoPtr pPadlnfo = 

szFileName = pPad!nfo->FileName; 



catch(...) 

{ 

AddMessage( This->fhWnd,"Error 
break; 



20 



#ifdef DEBUG 



25 



else 

{ 



30 (*.ixu 5 *.pad)\0*.ixu;*.pad\O n ; 



OPENFILENAME ofn; 

memset(&ofn,0,sizeof(ofn)); 
ofn.lStructSize = sizeof(ofn); 
ofn.hwndOwner = hWnd; 
ofn.lpstrFilter = "Ink Files 

ofn.nFilterlndex = 1; 
message[0] = 0; 
ofn.lpstrFile = message; 
ofn.nMaxFile = 256; 
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ofn.Flags - OFN_ENABLESIZING | OFN EXPLORER 

| OFN FILEMUSTEXIST; 

if (GetOpenFileName(&ofn)) 

szFileName = ofn.lpstrFile; 

5 else 

break; 

} 

#endif 

hFile = 

10 CreateFile(szFileName,GENERIC_READ,FILE_SHARE_READ,NULL,OPEN_EXISTING,0,NULL 

); 

if(INVALID_HANDLE_VALUE != hFile) 
{ This->dwOutBufferCount = 

GetFileSize(hFile.NULL); 
15 if (This->dwOutBufferCount > outBufferS ize) 

{ 

unsigned char *tmp; 
if (This->gVerbose) { 

20 AddMessage( 
This->fhWnd,"Increasing buffer size"); 

} 

tmp = (unsigned char *) 
25 NPN_MemAlloc(This->dwDataLength); 

if (tmp ==NULL) { 

AddMessage(This->fhWnd ? 

"Unable to reallocate output buffer."); 

Cleanup(This); 

30 } 

else { 

memcpy(tmp ? outBuffer,outBufferSize); 

outBufferSize = 
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This->dwDataLength; 

NPNMemFree(outBuffer); 
outBuffer = tmp; 

} 

5 

tmp = (unsigned char *) 
NPN_MemAlloc(This->dwDataLength*2+2); 

if (tmp == NULL) { 



10 "Unable to reallocate input buffer."); 



AddMessage(This->fhWnd, 
Cleanup(This); 



} 

else { 



1 5 memcpy(tmp,inBuffer,inBufferSize); 
Th is->d wDataLength *2+2 ; 

20 



inBufferSize = 

NPNMemFree(inBuffer); 
inBuffer = tmp; 



ReadFile(hFile ? outBuffer,This->dwOutBufferCount ? (unsigned long *) &w,NULL); 

CloseHandle(hFile); 
25 sprintf(message 3 M Read %d bytes from 

%s M s This->dwOutBufferCount,This->gComPort); 

if (This->gVerbose) AddMessage( This->fhWnd, 

message); //***** 

strcpy((char *) inBuffer,"d-"); 
30 i2=2; 

for (; il<This->dwOutBufferCount; 

il++ ? i2+=2) { 

b2=(unsigned 

char)(outBuffer[i 1 ]»4); 
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inBuffer[i2]=TranslateDigitHex(b2); 



inBuffer[i2+ 1 ]=TranslateDigitHex((unsigned char)(outBuffer[i 1 ]-(b2«4))); 

} 

5 

err = PostURL(hWnd,This->gHostName,(unsigned 
short)atoi(This->gHostPort),atoi(^^ 

*2+2 5 This->gProxyName,(unsigned short)atoi(This->gProxyPort)); 

if(err==0){ 

1 0 AddMessage( This->fhWnd,"Upload 

Successful - please wait..."); 



NPN_GetURL(This->gInstance,This->gSourceURL 5 ,, _current M ); 

} else { 

1 5 AddMessage( This->fhWnd ? "Upload 

Failed"); 

Cleanup(This); 

fDone=FALSE; 

CRC=0; 

20 } 

} 

break; 
case WM TIMER: 
do { 

25 

gSuccess=ReadFile(hComm,&inBuffer[This->^^ 

if (IgSuccess) { 

i = GetLastErrorQ; 

30 if (dwRead>0) { 

This->dwInBufferCount+=dwRead; 

} 

if 

(This->dwInBufferIndex<This->dwInBufferCount) { 
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// If escape char is at end of 

buffer, wait for more data 

if ((inBuffer[This->dwInBufferIndex] 
= CPESCAPE) && (This->dwInBufferIndex = This->dwInBufferCount-l)) 
5 continue; 

switch (This->dwFrame) { 
case CPNOFRAME : 

switch (This->dwSubFrame) { 
case CPB_NONE : 
10 if 

(inBuffer[This->dwInBufferIndex]==CP__FRAME_START) { 

This->dwInBufferIndex++; 



15 This->dwSubFrame=CPB UIFRAME; 



} else { 



This->dwInBufferIndex++; 

20 break; 

case CPB UIFRAME : 
if 

(inBuffer[This->dwInBufferIndex]==CP_UI_FRAME) { 

CRC = 

25 initialCrcValue; 

CRC = 

CrcCalculate(CRC, GetNextByte(inBuffer,&This->dwInBufferIndex)); 

This->dwSubFrame=CPB_MSBFRAMELENGTH; 
30 } else { 

AddMessage( 

This->fhWnd,"ERROR ONE.."); 
Cleanup(This); 
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# 



• 



return 0; 



break; 



case CPB MSBFRAME LENGTH : 



5 



CRC = 




1 0 This->dwSubFrame=CPB_LSBFRAMELENGTH; 

break; 

case CPB LSBFRAMELENGTH : 
CRC = 

CrcCalcuIate(CRC ? b2 = GetNextByte(inBuffer,&This->dwInBufferIndex)); 
15 This->dwFrameLength 
= (This->dwFrameLength « 8) + b2; 

Th i s->dw S ubFrame^C PBS TRE AMID ; 



break; 



20 



case CPB STREAMID : 



if 



(inBuffer[This->dwInBufferIndex]==CP_STREAM) { 



CRC = 



CrcCalculate(CRC, GetNextByte(inBuffer,&This->dwInBufferIndex)); 



25 



This->dwSubFrame=CPB_COMMAND; 



} else { 



AddMessage( 



This->fhWnd,"Pad error - please erase pad and retry.."); 



30 



Cleanup(This); 



return 0; 



break; 
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case CPB_COMMAND : 
if 

(inBuffer[This->dwInBufferIndex]==CP_NOP) { 
. 5 This->dwFrame=CP_UPLOAD; 
This->dwSubFrame=CPB_NOP; 

} else if 

(inBuffer[This->dwInBufferIndex]==CP_EOT) { 

10 

This->dwFrame=CP_FINAL; 
This->dwSubFrame=CPB_EOT; 

} else { 

15 

This->dwFrame-CP_DATA; 

This->dwSubFrame=CPB_MSBBLOCKNUMBER; 

} 

20 break; 

} 

break; 
case CP UPLOAD : 

switch (This->dwSubFrame) { 
25 case CPB_NOP : 

CRC = 

CrcCalculate(CRC, GetNextByte(inBuffer ? &This->dwInBufferIndex)); 

This->dwSubFrame=CPB_MSBDATALENGTH; 
30 break; 

case CPB MSBDATALENGTH 
CRC = 

CrcCalculate(CRC, b2 = GetNextByte(inBuffer,&This->dwInBufferIndex)); 

This->dwDataLength = 
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b2; 



This->dwSubFrame=CPBSMSBDATALENGTH; 

break; 

5 case CPB SMSBDATALENGTH 

CRC = 

CrcCalculate(CRC, b2 = GetNextByte(inBuffer ? &This->dwInBufferIndex)); 

This->dwDataLength = 

(This->dwDataLength « 8) + b2; 

10 

This->dwSubFrame=CPB_SLSBDATALENGTH; 

break; 

case CPB SLSBDATALENGTH : 
CRC = 

1 5 CrcCalculate(CRC, b2 = GetNextByte(inBuffer,&This->dwInBufferIndex)); 

This->dwDataLength = 

(This->dwDataLength « 8) + b2; 

This->dwSubFrame-CPB_LSBDATALENGTH; 
20 break; 

case CPB LSBDATALENGTH : 
CRC = 

CrcCalculate(CRC, b2 = GetNextByte(inBuffer 3 &This->dwInBufferIndex)); 

This->dwDataLength = 

25 (This->dwDataLength « 8) + b2; 
This->dwSubFrame=CPB_CRC 1 ; 

break; 
caseCPB_CRCl : 
30 CRC = 

CrcCalculate(CRC ? GetNextByte(inBuffer,&This->dwInBufferIndex)); 

This->dwSubFrame=CPB_CRC2; 

break; 
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* 



case CPB_CRC2 : 
CRC = 

CrcCalculate(CRC, GetNextByte(inBuffer,&This->dwInBufferIndex)); 
5 This->dwSubFrame=CPB_FRAMEEND; 

break; 

case CPB FRAMEEND : 
gSuccess = TRUE; 
if 

10 (inBuffer[This->dwInBufferIndex]!=CP_FRAME_END) { 

if 

(This->gVerbose) { 



15 



20 



25 



AddMessage( This->fhWnd,"Frame End Offset..."); 
FALSE; 

(CRC!=goodCrcValue) { 
This->fhWnd,"ERROR FOUR..."); 
FALSE: 



} 

gSuccess 



} else if 



AddMessage( 
gSuccess = 



if (IgSuccess) { 



30 



This->dwSubFrame=CPB_NONE; 
This->dwFrame=CP_NOFRAME; 
DoNack(hComm); 

(This->gVerbose) AddMessage( This->fhWnd,"NACK..."); 



if 
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10 



15 



20 



This->dwNackCount++; 
(This->dwNackCounr=3) fDone=TRUE; 



This->dwInBufferIndex-H-; 

This->dwSubFrame=CPB_NONE; 

This->dwFrame=CP_NOFRAME; 



{ 



This^fhWnd/'ACK..."); 



This->fhWnd,AddTick(rnessage)); 



25 (This->dwDataLength > outBufferSize) { 



char *tmp; 



if 



break; 



DoAck(hComm); 
if (This->gVerbose) 

AddMessage( 



} else { 



AddMessage( 

} 

This->dwNackCount=0; 
This->gReading=TRUE; 

if 



unsigned 



if 



30 (This->gVerbose) { 



AddMessage( This->fhWnd ? "Increasing buffer size"); 
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tmp = 

(unsigned char *) NPN _MemAlIoc(This->dwDataLength); 

if (tmp 

NULL) { 

5 

AddMessage(This->fhWnd ? "Unable to reallocate output buffer."); 
Cleanup(This); 

} 

10 else { 

memcpy(tmp 3 outBuffer ? outBufferSize); 
outBufferSize = This->dwDataLength; 
NPNJVlernFree(outBuffer); 
outBuffer = tmp; 



15 



20 



25 



} 

tmp = 

(unsigned char *) NPN_MemAlIoc(This->dwDataLength*2+2); 

if (tmp : 

NULL) { 

AddMessage(This->fhWnd, "Unable to reallocate input buffer."); 
Cleanup(This); 

} 

30 else { 

memcpy(tmp,inBuffer,inBufferSize); 
inBufferSize = This->dwDataLength*2+2; 
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NPN_MemFree(inBuffer); 



inBuffer = tmp; 



break; 



10 break; 

case CP_DATA : 

switch (This->dwSubFrarne) { 
case CPB_MSBBLOCKNUMBER : 
CRC = 

1 5 CrcCalculate(CRC, b2 = GetNextByte(inBuffer ? &This->dwInBufferIndex)); 

This->dwBlockNumber 

= b2; 



20 



25 



30 



This->dwFrameLength— ; 
This->dwDataLength— ; 

This->dvvSubFrame=CPB_LSBBLOCKNUMBER; 

break; 

case CPB_LSBBLOCKNUMBER 
CRC = 

CrcCalculate(CRC, b2 = GetNextByte(inBuffer,&This->dwInBufferIndex)); 

This->dwBlockNumber 

= (This->dwBlockNumber « 8) + b2; 
This->dwFrameLength--; 



Th is->dwDataLength— ; 
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This->dwSubFrame=CPB_MSBBLOCK>RJMBERC; 

break; 

case CPBMSBBLOCKNUMBERC 
CRC = 

5 CrcCalculate(CRC, b2 = GetNextByte(inBuffer,&This->dwInBufferIndex)); 

This->dwBlockNumberC 

= b2; 

This->dwFrameLength— ; 

10 

Th i s->d wDataLength— ; 

This->dwSubFrame=CPB_LSBBLOCKNUMBERC; 

break; 

1 5 case CPBLSBBLOCKNUMBERC : 

CRC = 

CrcCalculate(CRC, b2 = GetNextByte(inBuffer 5 &This->dwInBufferIndex)); 

This->dwBlockNumberC 

= (This->dwBlockNumberC « 8) + b2; 

20 

Th i s->d wFrameLength— ; 
Th i s->d wDataLength— ; 
25 This->dwBlockStart=This->dwOutBufferCount; 
This->dwSubFrame=CPB_DATA; 

break; 
case CPBJDATA : 
30 if 
(inBuffer[This->dwInBufferIndex]=CP_FRAME_END) { 

This->dwOutBufferCount-=2; 
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This->dwSubFrame=CPB_FRAMEEND; 

break; 

CRC = 

5 CrcCaIculate(CRC, b2 = GetNextByte(inBuffer,&This->dwInBufferIndex)); 
outBuffer[This->dwOutBufferCount++]=b2; 
This->dwFrameLength~; 

10 

Th i s->d wDataLength--; 

break; 

case CPBFRAMEEND : 
gSuccess = TRUE; 
15 if 
(inBuffer[This->dwInBufferIndex] !=CP_FRAME_END) { 

AddMessage( 

This->fhWnd,"ERROR FIVE"); 

gSuccess = 

20 FALSE; 

} 

if 

(This->dwBlockNumber==This->dwPreviousBlockNumber) { 

AddMessage( 

25 This->fhWnd,"Block Reread..."); 

} 

if 

(CRC!=goodCrc Value || ! gSuccess) { 
30 This->dwPreviousBlockNumber=This->dwBlockNumber; 
sprintf(message,"Block Number:%d 

CRC:%d=%d",This->dwBlockNumber,CRC,goodCrc Value); 

if 
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(This->gVerbose) AddMessage( This->fhWnd, message); 
This->dwOutBufferCount=This->dwBlockStart; 
5 This->dwInBufferIndex++; 

This->dwSubFrame=CPB_NONE; 
This->dwFrame=CP_NOFRAME; 

10 

DoNack(hComm); 

if 

(This->gVerbose) AddMessage( This->fhWnd/'NACK... M ); 
15 This->dwNackCount++; 

if 

(This->dwNackCount-=3) fDone=TRUE; 

} else { 

20 This->dwPreviousBlockNumber==This->dwBlockNumber; 
sprintf(message, "Block Number:%d 

CRC:%d=%d ,t ? This->dwBlockNumber ) CRC,goodCrcValue); 

if 

25 (This->gYerbose) AddMessage( This->fhWnd,message); 
This->dwInBufferIndex++; 
This->dwSubFrame=CPB_NONE; 

30 

This->dwFrame=CP_NOFRAME; 
DoAck(hComm); 
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(This->gVerbose) { 

AddMessage( This->fhWnd,"ACK..."); 

5 

AddMessage( This->fhWnd,AddTick(message)); 



} else { 



} 



break; 



10 } 



break; 
case CP^FINAL : 

switch (This->dwSubFrame) { 
15 caseCPB_EOT: 

CRC- 

CrcCalculate(CRC, GetNextByte(inBuffer 5 &This->dwInBufferIndex)); 

This->dwSubFrame=CPB_CRC 1 ; 
20 break; 

case CPBCRCl : 
CRC = 

CrcCalculate(CRC, GetNextByte(inBuffer,&This->dwInBufferIndex)); 
25 This->dwSubFrame=CPB_CRC2; 

break; 
case CPB_CRC2 : 
CRC = 

CrcCalculate(CRC, GetNextByte(inBuffer,&This->dwInBufferIndex)); 

30 

This->dwSubFrame=CPB_FRAMEEND; 

break; 

case CPB_FRAMEEND : 
gSuccess = TRUE; 
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10 



15 



20 



if 

(inBuffer[This->dwInBufferIndex]!=CP_FRAME_END) { 

This->fhWnd,"ERROR SIX"); 

FALSE; 



AddMessage( 
gSuccess = 



} 

else if 



(CRC!=goodCrcValue) { 
This->fhWnd,"ERROR SEVEN"); 
FALSE; 



AddMessage( 
gSuccess = 



} 



if (IgSuccess) { 



DoNack(hComm); 



if 



(This->gVerbose) AddMessage( This->fhWnd,"NACK... M ); 



Th i s->dwN ackC o unH 



(This->dwNackCount=3) fDone=TRUE; 



25 

This->dwInBufferIndex-H-; 



This->dwSubFrame=CPB_NONE; 



30 This->dwFrame=CP_NOFRAME; 



} else fDone = TRUE; 



break; 



break; 
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} 

} 

} while (This->gReading&&!fDone); 
if (fDone) { 

5 

// The following code is used to save the 

buffer to a file for analysis 
#ifdef DEBUG 

HANDLE hCommLog; 
10 DWORD dw Write; 



hCommLog=CreateFile("D:\\TEMP\\COMMLOG.BIN M 3 GENERIC_READ | GENERIC_WRITE 
,FILE_SHARE_WRITE ? NULL 3 CREATE_ALWAYS ? 0 3 NULL); 

15 

WriteFile(hCommLogJnBuffer,This->dwInBufferCount,&dwWrite 5 NIJLL); 

CIoseHandle(hCommLog); 

#endif 

20 This->gReading=FALSE; 

if (This->dwNackCount < 3) { 

sprintf(message,"Read %d bytes from 
%s" 5 This->dwOutBufferCount,This->gComPort); 

if (This->gVerbose) AddMessage( 

25 This->fhWnd, message ); //***** 

strcpy((char *) inBuffer,"d= n ); 
i2=2; 

for (; il<This->dwOutBufferCount; 

il4-+,i2+=2) { 

30 b2=(unsigned 
char)(outBuffer[il]»4); 



inBuffer[i2]-TranslateDigitHex(b2); 
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# 



inBuffer[i2+l]=TranslateDigitHex((unsigned char)(outBuffer[il]-(b2«4))); 

} 

5 err = 

PostURL(hWnd,This->gHostName ? (unsigned 
short)atoi(This->gHostPort),atoi(™ 

*2+2,This->gProxyNarne,(unsigned short)atoi(This->gProxyPort)); 

} 

10 else err = 1; 

if (err=0) { 

AddMessage( This->fhWnd,"UpIoad 

Successful - please wait..."); 



15 NP^GetURLCThis^glnstance^his^gSourceURL/^current"); 

} else { 

AddMessage( This->fliWnd, "Upload 

Failed"); 

Cleanup(This); 

20 fDone=FALSE; 

CRO0; 

} 

/*err = NPN_PostURL( glnstance, gURL, NULL, 
dwOutBufferCount*2-K2, inBuffer, FALSE); 
25 if( err != NPERRNOERROR ) { 

printf("Error on NPNJPostURL()"); 

}*/ 

} 

break; 

30 

case WM_PAINT: { 

hdc = BeginPaint( hWnd, &paintStruct ); 
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HBRUSH hBr; 



hBr = CreateSolidBrush(GetSysColor(COLOR_WrNDOW)); 
GetClientRect(hWnd,&rect); 

5 

FillRect(hdc,&rect,hBr); 

DeleteObject(hBr); 

10 for (i = 0; i < gNumLines; i++ ) { 

TextOut( hdc, 0, (i * 20), 
gMessageTextArray[i], strlen(gMessageTextArray[i]) ); 

\ 



1 5 EndPaint( h Wnd, &paintStruct ); 

break; 

} 

default: { 

This->fDefaultWindowProc( hWnd, Msg, wParam, 

20 lParam); 

} 

} 

return 0; 

25 //======================================= 
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